﻿
Imports xmlctrl
Imports xhtmlctrl
Imports webctrl

Public Class sitemap
    Inherits cacheControlProcessor

    Public Const _pathidentity As String = network.pathSeperator + "sitemap.xml"

    Public Overrides Function pathidentity() As String
        Return _pathidentity
    End Function

#If RETIRED Then
    Protected Overrides Sub addresponseHeaders(ByVal context As httpContext)
        MyBase.addresponseHeaders(context)
        context.setcontentType(network.http.contentType.textxml)
    End Sub
#End If

    Protected Overrides Function processImpl(ByVal context As httpContext, ByRef control As xmlcontrol) As Boolean
        control = sitemapContent.create(context)
        context.setcontentType(network.http.contentType.textxml)
        Return True
    End Function
End Class
